/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / language / cyril-util.elc.z / cyril-util.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 73 74 65 76 65 40 61 |piled by| steve@a|
|00000020| 6c 74 61 69 72 2e 78 65 | 6d 61 63 73 2e 6f 72 67 |ltair.xe|macs.org|
|00000030| 20 6f 6e 20 54 68 75 20 | 4e 6f 76 20 32 30 20 31 | on Thu |Nov 20 1|
|00000040| 37 3a 35 32 3a 32 33 20 | 31 39 39 37 0a 3b 3b 3b |7:52:23 |1997.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 68 6f 6d 65 | from fi|le /home|
|00000060| 2f 78 65 6d 61 63 73 2f | 32 30 2e 33 2f 78 65 6d |/xemacs/|20.3/xem|
|00000070| 61 63 73 2d 32 30 2e 33 | 2f 6c 69 73 70 2f 6c 61 |acs-20.3|/lisp/la|
|00000080| 6e 67 75 61 67 65 2f 63 | 79 72 69 6c 2d 75 74 69 |nguage/c|yril-uti|
|00000090| 6c 2e 65 6c 0a 3b 3b 3b | 20 65 6d 61 63 73 20 76 |l.el.;;;| emacs v|
|000000a0| 65 72 73 69 6f 6e 20 32 | 30 2e 33 20 22 56 61 74 |ersion 2|0.3 "Vat|
|000000b0| 69 63 61 6e 20 43 69 74 | 79 22 20 58 45 6d 61 63 |ican Cit|y" XEmac|
|000000c0| 73 20 20 4c 75 63 69 64 | 2e 0a 3b 3b 3b 20 62 79 |s  Lucid|..;;; by|
|000000d0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 32 |tecomp v|ersion 2|
|000000e0| 2e 32 35 20 58 45 6d 61 | 63 73 3b 20 32 32 2d 4d |.25 XEma|cs; 22-M|
|000000f0| 61 72 2d 39 36 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ar-96..;|;; optim|
|00000100| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000110| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000120| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000130| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000140| 45 6d 61 63 73 20 31 39 | 2e 0a 0a 28 69 66 20 28 |Emacs 19|...(if (|
|00000150| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000160| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000170| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000180| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|00000190| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|000001a0| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |.     (s|tring-le|
|000001b0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001c0| 6e 20 22 32 30 22 29 29 | 29 0a 20 20 20 20 28 65 |n "20"))|).    (e|
|000001d0| 72 72 6f 72 20 22 60 63 | 79 72 69 6c 2d 75 74 69 |rror "`c|yril-uti|
|000001e0| 6c 2e 65 6c 27 20 77 61 | 73 20 63 6f 6d 70 69 6c |l.el' wa|s compil|
|000001f0| 65 64 20 66 6f 72 20 45 | 6d 61 63 73 20 32 30 22 |ed for E|macs 20"|
|00000200| 29 29 0a 0a 28 6f 72 20 | 28 62 6f 75 6e 64 70 20 |))..(or |(boundp |
|00000210| 27 63 75 72 72 65 6e 74 | 2d 6c 6f 61 64 2d 6c 69 |'current|-load-li|
|00000220| 73 74 29 20 28 73 65 74 | 71 20 63 75 72 72 65 6e |st) (set|q curren|
|00000230| 74 2d 6c 6f 61 64 2d 6c | 69 73 74 20 6e 69 6c 29 |t-load-l|ist nil)|
|00000240| 29 0a 0a 28 72 65 71 75 | 69 72 65 20 27 6d 75 6c |)..(requ|ire 'mul|
|00000250| 65 29 0a 3b 3b 3b 23 23 | 23 63 6f 64 69 6e 67 20 |e).;;;##|#coding |
|00000260| 73 79 73 74 65 6d 3a 20 | 65 73 63 61 70 65 2d 71 |system: |escape-q|
|00000270| 75 6f 74 65 64 0a 0a 28 | 64 65 66 61 6c 69 61 73 |uoted..(|defalias|
|00000280| 20 27 73 65 74 75 70 2d | 63 79 72 69 6c 6c 69 63 | 'setup-|cyrillic|
|00000290| 2d 69 73 6f 2d 65 6e 76 | 69 72 6f 6e 6d 65 6e 74 |-iso-env|ironment|
|000002a0| 20 23 5b 6e 69 6c 20 22 | c0 c1 c2 c3 c4 24 87 22 | #[nil "|.....$."|
|000002b0| 20 5b 73 65 74 75 70 2d | 38 2d 62 69 74 2d 65 6e | [setup-|8-bit-en|
|000002c0| 76 69 72 6f 6e 6d 65 6e | 74 20 22 43 79 72 69 6c |vironmen|t "Cyril|
|000002d0| 6c 69 63 2d 49 53 4f 22 | 20 63 79 72 69 6c 6c 69 |lic-ISO"| cyrilli|
|000002e0| 63 2d 69 73 6f 38 38 35 | 39 2d 35 20 69 73 6f 2d |c-iso885|9-5 iso-|
|000002f0| 38 38 35 39 2d 35 20 22 | 63 79 72 69 6c 6c 69 63 |8859-5 "|cyrillic|
|00000300| 2d 79 61 77 65 72 74 79 | 22 5d 20 35 20 22 5c 0a |-yawerty|"] 5 "\.|
|00000310| 53 65 74 75 70 20 6d 75 | 6c 74 69 6c 69 6e 67 75 |Setup mu|ltilingu|
|00000320| 61 6c 20 65 6e 76 69 72 | 6f 6e 6d 65 6e 74 20 28 |al envir|onment (|
|00000330| 4d 55 4c 45 29 20 66 6f | 72 20 43 79 72 69 6c 6c |MULE) fo|r Cyrill|
|00000340| 69 63 20 49 53 4f 2d 38 | 38 35 39 2d 35 20 75 73 |ic ISO-8|859-5 us|
|00000350| 65 72 73 2e 22 20 6e 69 | 6c 5d 29 0a 28 64 65 66 |ers." ni|l]).(def|
|00000360| 61 6c 69 61 73 20 27 73 | 65 74 75 70 2d 63 79 72 |alias 's|etup-cyr|
|00000370| 69 6c 6c 69 63 2d 6b 6f | 69 38 2d 65 6e 76 69 72 |illic-ko|i8-envir|
|00000380| 6f 6e 6d 65 6e 74 20 23 | 5b 6e 69 6c 20 22 c0 c1 |onment #|[nil "..|
|00000390| c2 c3 c4 24 87 22 20 5b | 73 65 74 75 70 2d 38 2d |...$." [|setup-8-|
|000003a0| 62 69 74 2d 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 20 |bit-envi|ronment |
|000003b0| 22 43 79 72 69 6c 6c 69 | 63 2d 4b 4f 49 38 22 20 |"Cyrilli|c-KOI8" |
|000003c0| 63 79 72 69 6c 6c 69 63 | 2d 69 73 6f 38 38 35 39 |cyrillic|-iso8859|
|000003d0| 2d 35 20 6b 6f 69 38 2d | 72 20 22 63 79 72 69 6c |-5 koi8-|r "cyril|
|000003e0| 6c 69 63 2d 79 61 77 65 | 72 74 79 22 5d 20 35 20 |lic-yawe|rty"] 5 |
|000003f0| 22 5c 0a 53 65 74 75 70 | 20 6d 75 6c 74 69 6c 69 |"\.Setup| multili|
|00000400| 6e 67 75 61 6c 20 65 6e | 76 69 72 6f 6e 6d 65 6e |ngual en|vironmen|
|00000410| 74 20 28 4d 55 4c 45 29 | 20 66 6f 72 20 43 79 72 |t (MULE)| for Cyr|
|00000420| 69 6c 6c 69 63 20 4b 4f | 49 38 20 75 73 65 72 73 |illic KO|I8 users|
|00000430| 2e 22 20 6e 69 6c 5d 29 | 0a 28 64 65 66 61 6c 69 |." nil])|.(defali|
|00000440| 61 73 20 27 73 65 74 75 | 70 2d 63 79 72 69 6c 6c |as 'setu|p-cyrill|
|00000450| 69 63 2d 61 6c 74 65 72 | 6e 61 74 69 76 6e 79 6a |ic-alter|nativnyj|
|00000460| 2d 65 6e 76 69 72 6f 6e | 6d 65 6e 74 20 23 5b 6e |-environ|ment #[n|
|00000470| 69 6c 20 22 c0 c1 c2 c3 | c4 24 87 22 20 5b 73 65 |il "....|.$." [se|
|00000480| 74 75 70 2d 38 2d 62 69 | 74 2d 65 6e 76 69 72 6f |tup-8-bi|t-enviro|
|00000490| 6e 6d 65 6e 74 20 22 43 | 79 72 69 6c 6c 69 63 22 |nment "C|yrillic"|
|000004a0| 20 63 79 72 69 6c 6c 69 | 63 2d 69 73 6f 38 38 35 | cyrilli|c-iso885|
|000004b0| 39 2d 35 20 61 6c 74 65 | 72 6e 61 74 69 76 6e 79 |9-5 alte|rnativny|
|000004c0| 6a 20 22 63 79 72 69 6c | 6c 69 63 2d 79 61 77 65 |j "cyril|lic-yawe|
|000004d0| 72 74 79 22 5d 20 35 20 | 22 5c 0a 53 65 74 75 70 |rty"] 5 |"\.Setup|
|000004e0| 20 6d 75 6c 74 69 6c 69 | 6e 67 75 61 6c 20 65 6e | multili|ngual en|
|000004f0| 76 69 72 6f 6e 6d 65 6e | 74 20 28 4d 55 4c 45 29 |vironmen|t (MULE)|
|00000500| 20 66 6f 72 20 43 79 72 | 69 6c 6c 69 63 20 41 4c | for Cyr|illic AL|
|00000510| 54 45 52 4e 41 54 49 56 | 4e 59 4a 20 75 73 65 72 |TERNATIV|NYJ user|
|00000520| 73 2e 22 20 6e 69 6c 5d | 29 0a 28 64 65 66 76 61 |s." nil]|).(defva|
|00000530| 72 20 63 79 72 69 6c 6c | 69 63 2d 6c 61 6e 67 75 |r cyrill|ic-langu|
|00000540| 61 67 65 2d 61 6c 69 73 | 74 20 28 6c 69 73 74 20 |age-alis|t (list |
|00000550| 27 28 22 42 65 6c 6f 72 | 75 73 73 69 61 6e 22 29 |'("Belor|ussian")|
|00000560| 20 27 28 22 42 75 6c 67 | 61 72 69 61 6e 22 29 20 | '("Bulg|arian") |
|00000570| 27 28 22 4d 61 63 65 64 | 6f 6e 69 61 6e 22 29 20 |'("Maced|onian") |
|00000580| 27 28 22 52 75 73 73 69 | 61 6e 22 29 20 27 28 22 |'("Russi|an") '("|
|00000590| 53 65 72 62 69 61 6e 22 | 29 20 27 28 22 55 6b 72 |Serbian"|) '("Ukr|
|000005a0| 61 69 6e 69 61 6e 22 29 | 29 20 22 5c 0a 2a 4c 69 |ainian")|) "\.*Li|
|000005b0| 73 74 20 6f 66 20 6b 6e | 6f 77 6e 20 63 79 72 69 |st of kn|own cyri|
|000005c0| 6c 6c 69 63 20 6c 61 6e | 67 75 61 67 65 73 22 29 |llic lan|guages")|
|000005d0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 73 74 61 6e |.(defali|as 'stan|
|000005e0| 64 61 72 64 2d 64 69 73 | 70 6c 61 79 2d 63 79 72 |dard-dis|play-cyr|
|000005f0| 69 6c 6c 69 63 2d 74 72 | 61 6e 73 6c 69 74 20 23 |illic-tr|anslit #|
|00000600| 5b 28 26 6f 70 74 69 6f | 6e 61 6c 20 63 79 72 69 |[(&optio|nal cyri|
|00000610| 6c 6c 69 63 2d 6c 61 6e | 67 75 61 67 65 29 20 22 |llic-lan|guage) "|
|00000620| 08 ac 83 c1 20 10 5c 6e | c3 6b ab 82 c4 12 5c 6e |.... .\n|.k....\n|
|00000630| ac 85 c1 20 89 10 87 08 | c5 c6 49 88 08 c7 c8 49 |... ....|..I....I|
|00000640| 88 08 c9 ca 49 88 08 cb | cc 49 88 08 cd ce 49 88 |....I...|.I....I.|
|00000650| 08 cf d0 49 88 08 d1 d2 | 49 88 08 d3 d4 49 88 08 |...I....|I....I..|
|00000660| d5 d6 49 88 08 d7 d8 49 | 88 08 d9 da 49 88 08 db |..I....I|....I...|
|00000670| dc 49 88 08 dd de 49 88 | 08 df e0 49 88 08 e1 e2 |.I....I.|...I....|
|00000680| 49 88 08 e3 e4 49 88 08 | e5 e6 49 88 08 e7 e8 49 |I....I..|..I....I|
|00000690| 88 08 e9 ea 49 88 08 eb | ec 49 88 08 ed ee 49 88 |....I...|.I....I.|
|000006a0| 08 ef f0 49 88 08 f1 f2 | 49 88 08 f3 f4 49 88 08 |...I....|I....I..|
|000006b0| f5 f6 49 88 08 f7 f8 49 | 88 08 f9 fa 49 88 08 fb |..I....I|....I...|
|000006c0| fc 49 88 08 fd fe 49 88 | 08 ff 81 40 00 49 88 08 |.I....I.|...@.I..|
|000006d0| 81 41 00 81 42 00 49 88 | 08 81 43 00 81 44 00 49 |.A..B.I.|..C..D.I|
|000006e0| 88 08 81 45 00 81 46 00 | 49 88 08 81 47 00 81 48 |...E..F.|I...G..H|
|000006f0| 00 49 88 08 81 49 00 81 | 4a 00 49 88 08 81 4b 00 |.I...I..|J.I...K.|
|00000700| 81 4c 00 49 88 08 81 4d | 00 81 4e 00 49 88 08 81 |.L.I...M|..N.I...|
|00000710| 4f 00 81 50 00 49 88 08 | 81 51 00 81 52 00 49 88 |O..P.I..|.Q..R.I.|
|00000720| 08 81 53 00 81 54 00 49 | 88 08 81 55 00 81 56 00 |..S..T.I|...U..V.|
|00000730| 49 88 08 81 57 00 81 58 | 00 49 88 08 81 59 00 81 |I...W..X|.I...Y..|
|00000740| 5a 00 49 88 08 81 5b 00 | 81 5c 5c 00 49 88 08 81 |Z.I...[.|.\\.I...|
|00000750| 5d 00 81 5e 00 49 88 08 | 81 5f 00 81 60 00 49 88 |]..^.I..|._..`.I.|
|00000760| 08 81 61 00 81 62 00 49 | 88 08 81 63 00 81 64 00 |..a..b.I|...c..d.|
|00000770| 49 88 08 81 65 00 81 66 | 00 49 88 08 81 67 00 81 |I...e..f|.I...g..|
|00000780| 68 00 49 88 08 81 69 00 | 81 6a 00 49 88 08 81 6b |h.I...i.|.j.I...k|
|00000790| 00 81 6c 00 49 88 08 81 | 6d 00 81 6e 00 49 88 08 |..l.I...|m..n.I..|
|000007a0| 81 6f 00 81 70 00 49 88 | 08 81 71 00 81 72 00 49 |.o..p.I.|..q..r.I|
|000007b0| 88 08 81 73 00 81 74 00 | 49 88 08 81 75 00 81 76 |...s..t.|I...u..v|
|000007c0| 00 49 88 08 81 77 00 81 | 78 00 49 88 08 81 79 00 |.I...w..|x.I...y.|
|000007d0| 81 7a 00 49 88 08 81 7b | 00 81 7c 00 49 88 08 81 |.z.I...{|..|.I...|
|000007e0| 7d 00 81 7e 00 49 88 08 | 81 7f 00 81 80 00 49 88 |}..~.I..|......I.|
|000007f0| 08 81 81 00 81 82 00 49 | 88 08 81 83 00 81 84 00 |.......I|........|
|00000800| 49 88 08 81 85 00 81 86 | 00 49 88 08 81 87 00 81 |I.......|.I......|
|00000810| 88 00 49 88 08 81 89 00 | 81 8a 00 49 88 08 81 8b |..I.....|...I....|
|00000820| 00 81 8c 00 49 88 08 81 | 8d 00 81 8e 00 49 88 08 |....I...|.....I..|
|00000830| 81 8f 00 81 90 00 49 88 | 08 81 91 00 81 92 00 49 |......I.|.......I|
|00000840| 88 08 81 93 00 81 94 00 | 49 88 08 81 95 00 81 96 |........|I.......|
|00000850| 00 49 88 08 81 97 00 81 | 98 00 49 88 08 81 99 00 |.I......|..I.....|
|00000860| 81 9a 00 49 88 08 81 9b | 00 81 9c 00 49 88 08 81 |...I....|....I...|
|00000870| 9d 00 81 9e 00 49 88 08 | 81 9f 00 81 a0 00 49 88 |.....I..|......I.|
|00000880| 08 81 a1 00 81 a2 00 49 | 88 08 81 a3 00 81 a4 00 |.......I|........|
|00000890| 49 88 08 81 a5 00 81 a6 | 00 49 88 08 81 a7 00 81 |I.......|.I......|
|000008a0| a8 00 49 88 08 81 a9 00 | 81 aa 00 49 88 08 81 ab |..I.....|...I....|
|000008b0| 00 81 ac 00 49 88 08 81 | ad 00 81 ae 00 49 88 08 |....I...|.....I..|
|000008c0| 81 af 00 81 b0 00 49 88 | 08 81 b1 00 81 b2 00 49 |......I.|.......I|
|000008d0| 88 08 81 b3 00 81 b4 00 | 49 88 08 81 b5 00 81 b6 |........|I.......|
|000008e0| 00 49 88 08 81 b7 00 81 | b8 00 49 88 08 81 b9 00 |.I......|..I.....|
|000008f0| 81 ba 00 49 88 08 81 bb | 00 81 bc 00 49 88 5c 6e |...I....|....I.\n|
|00000900| 81 bd 00 6b ab b4 08 f9 | 81 be 00 49 88 08 81 7b |...k....|...I...{|
|00000910| 00 81 bf 00 49 88 08 81 | 43 00 81 c0 00 49 88 08 |....I...|C....I..|
|00000920| 81 85 00 81 c1 00 49 88 | 08 81 45 00 81 c2 00 49 |......I.|..E....I|
|00000930| 88 08 81 87 00 81 c3 00 | 49 88 5c 6e 81 c4 00 6b |........|I.\n...k|
|00000940| ad b1 08 d7 81 c5 00 49 | 88 08 81 59 00 81 c6 00 |.......I|...Y....|
|00000950| 49 88 08 d9 81 c7 00 49 | 88 08 81 5b 00 81 c8 00 |I......I|...[....|
|00000960| 49 88 08 81 43 00 81 c9 | 00 49 88 08 81 45 00 81 |I...C...|.I...E..|
|00000970| ca 00 49 87 22 20 5b 73 | 74 61 6e 64 61 72 64 2d |..I." [s|tandard-|
|00000980| 64 69 73 70 6c 61 79 2d | 74 61 62 6c 65 20 6d 61 |display-|table ma|
|00000990| 6b 65 2d 64 69 73 70 6c | 61 79 2d 74 61 62 6c 65 |ke-displ|ay-table|
|000009a0| 20 63 79 72 69 6c 6c 69 | 63 2d 6c 61 6e 67 75 61 | cyrilli|c-langua|
|000009b0| 67 65 20 22 22 20 6e 69 | 6c 20 3f 1b 2d 4c d0 20 |ge "" ni|l ?.-L. |
|000009c0| 5b 3f 61 5d 20 3f d1 20 | 5b 3f 62 5d 20 3f d2 20 |[?a] ?. |[?b] ?. |
|000009d0| 5b 3f 76 5d 20 3f d3 20 | 5b 3f 67 5d 20 3f d4 20 |[?v] ?. |[?g] ?. |
|000009e0| 5b 3f 64 5d 20 3f d5 20 | 5b 3f 65 5d 20 3f f1 20 |[?d] ?. |[?e] ?. |
|000009f0| 5b 3f 79 20 3f 6f 5d 20 | 3f d6 20 5b 3f 7a 20 3f |[?y ?o] |?. [?z ?|
|00000a00| 68 5d 20 3f d7 20 5b 3f | 7a 5d 20 3f d8 20 5b 3f |h] ?. [?|z] ?. [?|
|00000a10| 69 5d 20 3f d9 20 5b 3f | 6a 5d 20 3f da 20 5b 3f |i] ?. [?|j] ?. [?|
|00000a20| 6b 5d 20 3f db 20 5b 3f | 6c 5d 20 3f dc 20 5b 3f |k] ?. [?|l] ?. [?|
|00000a30| 6d 5d 20 3f dd 20 5b 3f | 6e 5d 20 3f de 20 5b 3f |m] ?. [?|n] ?. [?|
|00000a40| 6f 5d 20 3f df 20 5b 3f | 70 5d 20 3f e0 20 5b 3f |o] ?. [?|p] ?. [?|
|00000a50| 72 5d 20 3f e1 20 5b 3f | 73 5d 20 3f e2 20 5b 3f |r] ?. [?|s] ?. [?|
|00000a60| 74 5d 20 3f e3 20 5b 3f | 75 5d 20 3f e4 20 5b 3f |t] ?. [?|u] ?. [?|
|00000a70| 66 5d 20 3f e5 20 5b 3f | 6b 20 3f 68 5d 20 3f e6 |f] ?. [?|k ?h] ?.|
|00000a80| 20 5b 3f 74 20 3f 73 5d | 20 3f e7 20 5b 3f 63 20 | [?t ?s]| ?. [?c |
|00000a90| 3f 68 5d 20 3f e8 20 5b | 3f 73 20 3f 68 5d 20 3f |?h] ?. [|?s ?h] ?|
|00000aa0| e9 20 5b 3f 73 20 3f 63 | 20 3f 68 5d 20 3f ea 20 |. [?s ?c| ?h] ?. |
|00000ab0| 5b 3f 5c 7e 5d 20 3f eb | 20 5b 3f 79 5d 20 3f ec |[?\~] ?.| [?y] ?.|
|00000ac0| 20 5b 3f 5c 27 5d 20 3f | ed 20 5b 3f 65 20 3f 5c | [?\'] ?|. [?e ?\|
|00000ad0| 27 5d 20 3f ee 20 5b 3f | 79 20 3f 75 5d 20 3f ef |'] ?. [?|y ?u] ?.|
|00000ae0| 20 5b 3f 79 20 3f 61 5d | 20 3f b0 20 5b 3f 41 5d | [?y ?a]| ?. [?A]|
|00000af0| 20 3f b1 20 5b 3f 42 5d | 20 3f b2 20 5b 3f 56 5d | ?. [?B]| ?. [?V]|
|00000b00| 20 3f b3 20 5b 3f 47 5d | 20 3f b4 20 5b 3f 44 5d | ?. [?G]| ?. [?D]|
|00000b10| 20 3f b5 20 5b 3f 45 5d | 20 3f a1 20 5b 3f 59 20 | ?. [?E]| ?. [?Y |
|00000b20| 3f 6f 5d 20 3f b6 20 5b | 3f 5a 20 3f 68 5d 20 3f |?o] ?. [|?Z ?h] ?|
|00000b30| b7 20 5b 3f 5a 5d 20 3f | b8 20 5b 3f 49 5d 20 3f |. [?Z] ?|. [?I] ?|
|00000b40| b9 20 5b 3f 4a 5d 20 3f | ba 20 5b 3f 4b 5d 20 3f |. [?J] ?|. [?K] ?|
|00000b50| bb 20 5b 3f 4c 5d 20 3f | bc 20 5b 3f 4d 5d 20 3f |. [?L] ?|. [?M] ?|
|00000b60| bd 20 5b 3f 4e 5d 20 3f | be 20 5b 3f 4f 5d 20 3f |. [?N] ?|. [?O] ?|
|00000b70| bf 20 5b 3f 50 5d 20 3f | c0 20 5b 3f 52 5d 20 3f |. [?P] ?|. [?R] ?|
|00000b80| c1 20 5b 3f 53 5d 20 3f | c2 20 5b 3f 54 5d 20 3f |. [?S] ?|. [?T] ?|
|00000b90| c3 20 5b 3f 55 5d 20 3f | c4 20 5b 3f 46 5d 20 3f |. [?U] ?|. [?F] ?|
|00000ba0| c5 20 5b 3f 4b 20 3f 68 | 5d 20 3f c6 20 5b 3f 54 |. [?K ?h|] ?. [?T|
|00000bb0| 20 3f 73 5d 20 3f c7 20 | 5b 3f 43 20 3f 68 5d 20 | ?s] ?. |[?C ?h] |
|00000bc0| 3f c8 20 5b 3f 53 20 3f | 68 5d 20 3f c9 20 5b 3f |?. [?S ?|h] ?. [?|
|00000bd0| 53 20 3f 63 20 3f 68 5d | 20 3f ca 20 5b 3f 5c 7e |S ?c ?h]| ?. [?\~|
|00000be0| 5d 20 3f cb 20 5b 3f 59 | 5d 20 3f cc 20 5b 3f 5c |] ?. [?Y|] ?. [?\|
|00000bf0| 27 5d 20 3f cd 20 5b 3f | 45 20 3f 5c 27 5d 20 3f |'] ?. [?|E ?\'] ?|
|00000c00| ce 20 5b 3f 59 20 3f 75 | 5d 20 3f cf 20 5b 3f 59 |. [?Y ?u|] ?. [?Y|
|00000c10| 20 3f 61 5d 20 3f f4 20 | 5b 3f 69 20 3f 65 5d 20 | ?a] ?. |[?i ?e] |
|00000c20| 3f f7 20 5b 3f 69 5d 20 | 3f fe 20 5b 3f 75 5d 20 |?. [?i] |?. [?u] |
|00000c30| 3f f2 20 5b 3f 64 20 3f | 6a 5d 20 3f fb 20 5b 3f |?. [?d ?|j] ?. [?|
|00000c40| 63 20 3f 68 20 3f 6a 5d | 20 3f f3 20 5b 3f 67 20 |c ?h ?j]| ?. [?g |
|00000c50| 3f 6a 5d 20 3f f5 20 5b | 3f 73 5d 20 3f fc 20 5b |?j] ?. [|?s] ?. [|
|00000c60| 3f 6b 5d 20 3f f6 20 5b | 3f 69 5d 20 3f f8 20 5b |?k] ?. [|?i] ?. [|
|00000c70| 3f 6a 5d 20 3f f9 20 5b | 3f 6c 20 3f 6a 5d 20 3f |?j] ?. [|?l ?j] ?|
|00000c80| fa 20 5b 3f 6e 20 3f 6a | 5d 20 3f ff 20 5b 3f 64 |. [?n ?j|] ?. [?d|
|00000c90| 20 3f 7a 5d 20 3f a4 20 | 5b 3f 59 20 3f 65 5d 20 | ?z] ?. |[?Y ?e] |
|00000ca0| 3f a7 20 5b 3f 59 20 3f | 69 5d 20 3f ae 20 5b 3f |?. [?Y ?|i] ?. [?|
|00000cb0| 55 5d 20 3f a2 20 5b 3f | 44 20 3f 6a 5d 20 3f ab |U] ?. [?|D ?j] ?.|
|00000cc0| 20 5b 3f 43 20 3f 68 20 | 3f 6a 5d 20 3f a3 20 5b | [?C ?h |?j] ?. [|
|00000cd0| 3f 47 20 3f 6a 5d 20 3f | a5 20 5b 3f 53 5d 20 3f |?G ?j] ?|. [?S] ?|
|00000ce0| ac 20 5b 3f 4b 5d 20 3f | a6 20 5b 3f 49 5d 20 3f |. [?K] ?|. [?I] ?|
|00000cf0| a8 20 5b 3f 4a 5d 20 3f | a9 20 5b 3f 4c 20 3f 6a |. [?J] ?|. [?L ?j|
|00000d00| 5d 20 3f aa 20 5b 3f 4e | 20 3f 6a 5d 20 3f af 20 |] ?. [?N| ?j] ?. |
|00000d10| 5b 3f 44 20 3f 6a 5d 20 | 22 42 75 6c 67 61 72 69 |[?D ?j] |"Bulgari|
|00000d20| 61 6e 22 20 5b 3f 73 20 | 3f 68 20 3f 74 5d 20 5b |an" [?s |?h ?t] [|
|00000d30| 3f 53 20 3f 68 20 3f 74 | 5d 20 5b 3f 69 20 3f 75 |?S ?h ?t|] [?i ?u|
|00000d40| 5d 20 5b 3f 49 20 3f 75 | 5d 20 5b 3f 69 20 3f 61 |] [?I ?u|] [?i ?a|
|00000d50| 5d 20 5b 3f 49 20 3f 61 | 5d 20 22 55 6b 72 61 69 |] [?I ?a|] "Ukrai|
|00000d60| 6e 69 61 6e 22 20 5b 3f | 79 5d 20 5b 3f 59 5d 20 |nian" [?|y] [?Y] |
|00000d70| 5b 3f 69 5d 20 5b 3f 59 | 5d 20 5b 3f 69 20 3f 75 |[?i] [?Y|] [?i ?u|
|00000d80| 5d 20 5b 3f 69 20 3f 61 | 5d 5d 20 33 20 22 5c 1b |] [?i ?a|]] 3 "\.|
|00000d90| 2d 41 0a 44 69 73 70 6c | 61 79 20 61 20 63 79 72 |-A.Displ|ay a cyr|
|00000da0| 69 6c 6c 69 63 20 62 75 | 66 66 65 72 20 75 73 69 |illic bu|ffer usi|
|00000db0| 6e 67 20 61 20 74 72 61 | 6e 73 6c 69 74 65 72 61 |ng a tra|nslitera|
|00000dc0| 74 69 6f 6e 2e 0a 46 6f | 72 20 72 65 61 64 61 62 |tion..Fo|r readab|
|00000dd0| 69 6c 69 74 79 2c 20 74 | 68 65 20 74 61 62 6c 65 |ility, t|he table|
|00000de0| 20 69 73 20 73 6c 69 67 | 68 74 6c 79 0a 64 69 66 | is slig|htly.dif|
|00000df0| 66 65 72 65 6e 74 20 66 | 72 6f 6d 20 74 68 65 20 |ferent f|rom the |
|00000e00| 6f 6e 65 20 75 73 65 64 | 20 66 6f 72 20 74 68 65 |one used| for the|
|00000e10| 20 69 6e 70 75 74 20 6d | 65 74 68 6f 64 20 60 63 | input m|ethod `c|
|00000e20| 79 72 69 6c 6c 69 63 2d | 74 72 61 6e 73 6c 69 74 |yrillic-|translit|
|00000e30| 27 2e 0a 0a 54 68 65 20 | 61 72 67 75 6d 65 6e 74 |'...The |argument|
|00000e40| 20 69 73 20 61 20 73 74 | 72 69 6e 67 20 77 68 69 | is a st|ring whi|
|00000e50| 63 68 20 73 70 65 63 69 | 66 69 65 73 20 77 68 69 |ch speci|fies whi|
|00000e60| 63 68 20 6c 61 6e 67 75 | 61 67 65 20 79 6f 75 20 |ch langu|age you |
|00000e70| 61 72 65 20 75 73 69 6e | 67 3b 0a 74 68 61 74 20 |are usin|g;.that |
|00000e80| 61 66 66 65 63 74 73 20 | 74 68 65 20 63 68 6f 69 |affects |the choi|
|00000e90| 63 65 20 6f 66 20 74 72 | 61 6e 73 6c 69 74 65 72 |ce of tr|ansliter|
|00000ea0| 61 74 69 6f 6e 73 20 73 | 6c 69 67 68 74 6c 79 2e |ations s|lightly.|
|00000eb0| 0a 50 6f 73 73 69 62 6c | 65 20 76 61 6c 75 65 73 |.Possibl|e values|
|00000ec0| 20 61 72 65 20 6c 69 73 | 74 65 64 20 69 6e 20 27 | are lis|ted in '|
|00000ed0| 63 79 72 69 6c 6c 69 63 | 2d 6c 61 6e 67 75 61 67 |cyrillic|-languag|
|00000ee0| 65 2d 61 6c 69 73 74 27 | 2e 0a 49 66 20 74 68 65 |e-alist'|..If the|
|00000ef0| 20 61 72 67 75 6d 65 6e | 74 20 69 73 20 74 2c 20 | argumen|t is t, |
|00000f00| 77 65 20 75 73 65 20 74 | 68 65 20 64 65 66 61 75 |we use t|he defau|
|00000f10| 6c 74 20 63 79 72 69 6c | 6c 69 63 20 74 72 61 6e |lt cyril|lic tran|
|00000f20| 73 6c 69 74 65 72 61 74 | 69 6f 6e 2e 0a 49 66 20 |sliterat|ion..If |
|00000f30| 74 68 65 20 61 72 67 75 | 6d 65 6e 74 20 69 73 20 |the argu|ment is |
|00000f40| 6e 69 6c 2c 20 77 65 20 | 72 65 74 75 72 6e 20 74 |nil, we |return t|
|00000f50| 68 65 20 64 69 73 70 6c | 61 79 20 74 61 62 6c 65 |he displ|ay table|
|00000f60| 20 74 6f 20 69 74 73 20 | 73 74 61 6e 64 61 72 64 | to its |standard|
|00000f70| 20 73 74 61 74 65 2e 22 | 20 28 6c 69 73 74 20 28 | state."| (list (|
|00000f80| 6c 65 74 2a 20 28 28 63 | 6f 6d 70 6c 65 74 69 6f |let* ((c|ompletio|
|00000f90| 6e 2d 69 67 6e 6f 72 65 | 2d 63 61 73 65 20 74 29 |n-ignore|-case t)|
|00000fa0| 29 20 28 63 6f 6d 70 6c | 65 74 69 6e 67 2d 72 65 |) (compl|eting-re|
|00000fb0| 61 64 20 22 43 79 72 69 | 6c 6c 69 63 20 6c 61 6e |ad "Cyri|llic lan|
|00000fc0| 67 75 61 67 65 20 28 64 | 65 66 61 75 6c 74 20 6e |guage (d|efault n|
|00000fd0| 69 6c 29 3a 20 22 20 63 | 79 72 69 6c 6c 69 63 2d |il): " c|yrillic-|
|00000fe0| 6c 61 6e 67 75 61 67 65 | 2d 61 6c 69 73 74 20 6e |language|-alist n|
|00000ff0| 69 6c 20 74 20 6e 69 6c | 20 6e 69 6c 20 6e 69 6c |il t nil| nil nil|
|00001000| 29 29 29 5d 29 0a 28 70 | 72 6f 76 69 64 65 20 27 |)))]).(p|rovide '|
|00001010| 63 79 72 69 6c 2d 75 74 | 69 6c 29 0a             |cyril-ut|il).    |
+--------+-------------------------+-------------------------+--------+--------+